{-# LANGUAGE TemplateHaskell, QuasiQuotes, OverloadedStrings #-}
module Handler.Search where

import Foundation

import Settings.StaticFiles

import Handler.Common


getSearchR :: Handler RepHtml
getSearchR = do

    newDefaultLayout $ do

        setTitle "Search"

--        addStylesheet $ StaticR css_about_css

        addWidget $(widgetFile "search")